home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / gawk-3.000 / gawk-3 / gawk-3.0.0 / awklib / eg / misc / arraymax.awk next >
Encoding:
Text File  |  1996-01-11  |  103 b   |  11 lines
  1. {
  2.   if ($1 > max)
  3.     max = $1
  4.   arr[$1] = $0
  5. }
  6.  
  7. END {
  8.   for (x = 1; x <= max; x++)
  9.     print arr[x]
  10. }
  11.